home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / 599.swf / scripts / frame_166 / DoAction.as
Text File  |  2006-01-17  |  527b  |  26 lines
  1. hands = "";
  2. while(!(hand eq ""))
  3. {
  4.    man = hand.substr("1","1");
  5.    call("valSign");
  6.    min = man;
  7.    q = "0";
  8.    len = length(hand) / "3";
  9.    k = "0";
  10.    while(k < len)
  11.    {
  12.       man = hand.substr(k * "3" + "1","1");
  13.       call("valSign");
  14.       cur = man;
  15.       if(cur < min)
  16.       {
  17.          q = k;
  18.          min = cur;
  19.       }
  20.       k += "1";
  21.    }
  22.    hands = hands add hand.substr(q * "3" + "1","3");
  23.    hand = hand.substr("1",q * "3") add hand.substr((q + "1") * "3" + "1","-1");
  24. }
  25. hand = hands;
  26.